\hypertarget{partcles__wall_8f90}{
\section{partcles\_\-wall.f90 File Reference}
\label{partcles__wall_8f90}\index{partcles\_\-wall.f90@{partcles\_\-wall.f90}}
}
\subsection*{Functions/Subroutines}
\begin{DoxyCompactItemize}
\item 
subroutine \hyperlink{partcles__wall_8f90_a8e3f166e71d0dd9a9b093a4392298d7c}{area\_\-bc} (i1, i2, j1, j2, ks, iwid, jwid, kwid, updown, x, y, z, ax, ay, az)
\item 
subroutine \hyperlink{partcles__wall_8f90_a5e5d02cc0ef115367e0f5cfded2c0d68}{chek\_\-surf} (i1, i2, j1, j2, ksurf, iwid, jwid, kwid, x, y, z, px, py, pz, up, vp, wp, ax, ay, az, dt, nlist, ijktmp3)
\item 
subroutine \hyperlink{partcles__wall_8f90_abe0bdac03dbc200fbc650cdf8a7b1c0b}{closest\_\-vertex} (i1, i2, j1, j2, k1, k2, iwid, jwid, kwid, x, y, z, xp, yp, zp, imin, jmin, kmin, ijkmin)
\item 
subroutine \hyperlink{partcles__wall_8f90_ac5a1a2364e306bf90c3ec6cd89601421}{look\_\-evrywher} (i1, i2, j1, j2, k1, k2, iwid, jwid, kwid, eps, succes, x, y, z, xp, yp, zp, pxi, peta, pzta)
\item 
subroutine \hyperlink{partcles__wall_8f90_ad0bdb84183d0683f178ef61bfbcff1ed}{parbctor} (ncellsp, ijkctmp, iphead, npart, iwid, jwid, kwid, ibar, jbar, kbar, cdlt, sdlt, x, y, z, uptilde, vptilde, wptilde, px, py, pz, up, vp, wp, pxi, peta, pzta)
\item 
subroutine \hyperlink{partcles__wall_8f90_a1432f83eb7debfb831c9d5bf063dc4dc}{parbccyl} (ncellsp, ijkctmp, iphead, npart, iwid, jwid, kwid, ibar, jbar, kbar, dz, x, y, z, px, py, pz, up, vp, wp, pxi, peta, pzta)
\item 
subroutine \hyperlink{partcles__wall_8f90_ae691b59cc5a37c9d38a7d68da4f24de7}{parlocat} (ncellsp, ijkctmp, iphead, iwid, jwid, kwid, nsampl, vrms, t\_\-wall, ico, ijktmp2, ijktmp3, ijktmp4, rmaj, dz, alfa, ax, ay, az, dt, itdim, npart, ibar, jbar, kbar, mgeom, cdlt, sdlt, plost\_\-pos, plost\_\-neg, wate, x, y, z, bxv, byv, bzv, xptilde, yptilde, zptilde, uptilde, vptilde, wptilde, tsix, tsiy, tsiz, etax, etay, etaz, nux, nuy, nuz, link, iplost, qpar, px, py, pz, up, vp, wp, pxi, peta, pzta, cartesian, killer, wl, wr, wb, wt, we, wf, dx, dy, dzdummy, xl, xr, yb, yt, ze, zf, nu\_\-len, nu\_\-comm)
\item 
subroutine \hyperlink{partcles__wall_8f90_ac65101855df98ffe419c4d07e1250a36}{trilinp} (ncells, ijkcell, itdim, iwid, jwid, kwid, iphead, pxi, peta, pzta, wate, bxv, byv, bzv, bxpn, bypn, bzpn)
\end{DoxyCompactItemize}


\subsection{Function Documentation}
\hypertarget{partcles__wall_8f90_a8e3f166e71d0dd9a9b093a4392298d7c}{
\index{partcles\_\-wall.f90@{partcles\_\-wall.f90}!area\_\-bc@{area\_\-bc}}
\index{area\_\-bc@{area\_\-bc}!partcles_wall.f90@{partcles\_\-wall.f90}}
\subsubsection[{area\_\-bc}]{\setlength{\rightskip}{0pt plus 5cm}subroutine area\_\-bc (
\begin{DoxyParamCaption}
\item[{integer,intent(in)}]{ i1, }
\item[{integer,intent(in)}]{ i2, }
\item[{integer,intent(in)}]{ j1, }
\item[{integer,intent(in)}]{ j2, }
\item[{integer,intent(in)}]{ ks, }
\item[{integer,intent(in)}]{ iwid, }
\item[{integer,intent(in)}]{ jwid, }
\item[{integer,intent(in)}]{ kwid, }
\item[{real(double),intent(in)}]{ updown, }
\item[{real(double),dimension($\ast$),intent(in)}]{ x, }
\item[{real(double),dimension($\ast$),intent(in)}]{ y, }
\item[{real(double),dimension($\ast$),intent(in)}]{ z, }
\item[{real(double),dimension($\ast$),intent(out)}]{ ax, }
\item[{real(double),dimension($\ast$),intent(out)}]{ ay, }
\item[{real(double),dimension($\ast$),intent(out)}]{ az}
\end{DoxyParamCaption}
)}}
\label{partcles__wall_8f90_a8e3f166e71d0dd9a9b093a4392298d7c}


Definition at line 1 of file partcles\_\-wall.f90.

\hypertarget{partcles__wall_8f90_a5e5d02cc0ef115367e0f5cfded2c0d68}{
\index{partcles\_\-wall.f90@{partcles\_\-wall.f90}!chek\_\-surf@{chek\_\-surf}}
\index{chek\_\-surf@{chek\_\-surf}!partcles_wall.f90@{partcles\_\-wall.f90}}
\subsubsection[{chek\_\-surf}]{\setlength{\rightskip}{0pt plus 5cm}subroutine chek\_\-surf (
\begin{DoxyParamCaption}
\item[{integer,intent(in)}]{ i1, }
\item[{integer,intent(in)}]{ i2, }
\item[{integer,intent(in)}]{ j1, }
\item[{integer,intent(in)}]{ j2, }
\item[{integer,intent(in)}]{ ksurf, }
\item[{integer,intent(in)}]{ iwid, }
\item[{integer,intent(in)}]{ jwid, }
\item[{integer,intent(in)}]{ kwid, }
\item[{real(double),dimension($\ast$),intent(in)}]{ x, }
\item[{real(double),dimension($\ast$),intent(in)}]{ y, }
\item[{real(double),dimension($\ast$),intent(in)}]{ z, }
\item[{real(double),intent(in)}]{ px, }
\item[{real(double),intent(in)}]{ py, }
\item[{real(double),intent(in)}]{ pz, }
\item[{real(double),intent(in)}]{ up, }
\item[{real(double),intent(in)}]{ vp, }
\item[{real(double),intent(in)}]{ wp, }
\item[{real(double),dimension($\ast$),intent(in)}]{ ax, }
\item[{real(double),dimension($\ast$),intent(in)}]{ ay, }
\item[{real(double),dimension($\ast$),intent(in)}]{ az, }
\item[{real(double),intent(in)}]{ dt, }
\item[{integer,intent(out)}]{ nlist, }
\item[{integer,dimension($\ast$),intent(out)}]{ ijktmp3}
\end{DoxyParamCaption}
)}}
\label{partcles__wall_8f90_a5e5d02cc0ef115367e0f5cfded2c0d68}


Definition at line 65 of file partcles\_\-wall.f90.

\hypertarget{partcles__wall_8f90_abe0bdac03dbc200fbc650cdf8a7b1c0b}{
\index{partcles\_\-wall.f90@{partcles\_\-wall.f90}!closest\_\-vertex@{closest\_\-vertex}}
\index{closest\_\-vertex@{closest\_\-vertex}!partcles_wall.f90@{partcles\_\-wall.f90}}
\subsubsection[{closest\_\-vertex}]{\setlength{\rightskip}{0pt plus 5cm}subroutine closest\_\-vertex (
\begin{DoxyParamCaption}
\item[{integer,intent(in)}]{ i1, }
\item[{integer,intent(in)}]{ i2, }
\item[{integer,intent(in)}]{ j1, }
\item[{integer,intent(in)}]{ j2, }
\item[{integer,intent(in)}]{ k1, }
\item[{integer,intent(in)}]{ k2, }
\item[{integer,intent(in)}]{ iwid, }
\item[{integer,intent(in)}]{ jwid, }
\item[{integer,intent(in)}]{ kwid, }
\item[{real(double),dimension($\ast$),intent(in)}]{ x, }
\item[{real(double),dimension($\ast$),intent(in)}]{ y, }
\item[{real(double),dimension($\ast$),intent(in)}]{ z, }
\item[{real(double),intent(in)}]{ xp, }
\item[{real(double),intent(in)}]{ yp, }
\item[{real(double),intent(in)}]{ zp, }
\item[{integer,intent(out)}]{ imin, }
\item[{integer,intent(out)}]{ jmin, }
\item[{integer,intent(out)}]{ kmin, }
\item[{integer,intent(out)}]{ ijkmin}
\end{DoxyParamCaption}
)}}
\label{partcles__wall_8f90_abe0bdac03dbc200fbc650cdf8a7b1c0b}


Definition at line 139 of file partcles\_\-wall.f90.

\hypertarget{partcles__wall_8f90_ac5a1a2364e306bf90c3ec6cd89601421}{
\index{partcles\_\-wall.f90@{partcles\_\-wall.f90}!look\_\-evrywher@{look\_\-evrywher}}
\index{look\_\-evrywher@{look\_\-evrywher}!partcles_wall.f90@{partcles\_\-wall.f90}}
\subsubsection[{look\_\-evrywher}]{\setlength{\rightskip}{0pt plus 5cm}subroutine look\_\-evrywher (
\begin{DoxyParamCaption}
\item[{integer,intent(in)}]{ i1, }
\item[{integer,intent(in)}]{ i2, }
\item[{integer,intent(in)}]{ j1, }
\item[{integer,intent(in)}]{ j2, }
\item[{integer,intent(in)}]{ k1, }
\item[{integer,intent(in)}]{ k2, }
\item[{integer}]{ iwid, }
\item[{integer}]{ jwid, }
\item[{integer}]{ kwid, }
\item[{real(double)}]{ eps, }
\item[{logical,intent(out)}]{ succes, }
\item[{real(double),dimension($\ast$)}]{ x, }
\item[{real(double),dimension($\ast$)}]{ y, }
\item[{real(double),dimension($\ast$)}]{ z, }
\item[{real(double)}]{ xp, }
\item[{real(double)}]{ yp, }
\item[{real(double)}]{ zp, }
\item[{real(double),intent(out)}]{ pxi, }
\item[{real(double),intent(out)}]{ peta, }
\item[{real(double),intent(out)}]{ pzta}
\end{DoxyParamCaption}
)}}
\label{partcles__wall_8f90_ac5a1a2364e306bf90c3ec6cd89601421}


Definition at line 206 of file partcles\_\-wall.f90.

\hypertarget{partcles__wall_8f90_a1432f83eb7debfb831c9d5bf063dc4dc}{
\index{partcles\_\-wall.f90@{partcles\_\-wall.f90}!parbccyl@{parbccyl}}
\index{parbccyl@{parbccyl}!partcles_wall.f90@{partcles\_\-wall.f90}}
\subsubsection[{parbccyl}]{\setlength{\rightskip}{0pt plus 5cm}subroutine parbccyl (
\begin{DoxyParamCaption}
\item[{integer,intent(in)}]{ ncellsp, }
\item[{integer,dimension($\ast$),intent(in)}]{ ijkctmp, }
\item[{integer,dimension($\ast$),intent(in)}]{ iphead, }
\item[{integer,intent(in)}]{ npart, }
\item[{integer}]{ iwid, }
\item[{integer}]{ jwid, }
\item[{integer}]{ kwid, }
\item[{integer,intent(in)}]{ ibar, }
\item[{integer,intent(in)}]{ jbar, }
\item[{integer,intent(in)}]{ kbar, }
\item[{real(double),intent(in)}]{ dz, }
\item[{real(double),dimension($\ast$)}]{ x, }
\item[{real(double),dimension($\ast$)}]{ y, }
\item[{real(double),dimension($\ast$)}]{ z, }
\item[{real(double),dimension(0:npart)}]{ px, }
\item[{real(double),dimension(0:npart),intent(inout)}]{ py, }
\item[{real(double),dimension(0:npart)}]{ pz, }
\item[{real(double),dimension(0:npart)}]{ up, }
\item[{real(double),dimension(0:npart)}]{ vp, }
\item[{real(double),dimension(0:npart)}]{ wp, }
\item[{real(double),dimension(0:npart),intent(inout)}]{ pxi, }
\item[{real(double),dimension(0:npart),intent(inout)}]{ peta, }
\item[{real(double),dimension(0:npart),intent(in)}]{ pzta}
\end{DoxyParamCaption}
)}}
\label{partcles__wall_8f90_a1432f83eb7debfb831c9d5bf063dc4dc}


Definition at line 411 of file partcles\_\-wall.f90.

\hypertarget{partcles__wall_8f90_ad0bdb84183d0683f178ef61bfbcff1ed}{
\index{partcles\_\-wall.f90@{partcles\_\-wall.f90}!parbctor@{parbctor}}
\index{parbctor@{parbctor}!partcles_wall.f90@{partcles\_\-wall.f90}}
\subsubsection[{parbctor}]{\setlength{\rightskip}{0pt plus 5cm}subroutine parbctor (
\begin{DoxyParamCaption}
\item[{integer,intent(in)}]{ ncellsp, }
\item[{integer,dimension($\ast$),intent(in)}]{ ijkctmp, }
\item[{integer,dimension($\ast$),intent(in)}]{ iphead, }
\item[{integer,intent(in)}]{ npart, }
\item[{integer}]{ iwid, }
\item[{integer}]{ jwid, }
\item[{integer}]{ kwid, }
\item[{integer,intent(in)}]{ ibar, }
\item[{integer,intent(in)}]{ jbar, }
\item[{integer,intent(in)}]{ kbar, }
\item[{real(double),intent(in)}]{ cdlt, }
\item[{real(double),intent(in)}]{ sdlt, }
\item[{real(double),dimension($\ast$)}]{ x, }
\item[{real(double),dimension($\ast$)}]{ y, }
\item[{real(double),dimension($\ast$)}]{ z, }
\item[{real(double),dimension($\ast$),intent(inout)}]{ uptilde, }
\item[{real(double),dimension($\ast$),intent(inout)}]{ vptilde, }
\item[{real(double),dimension($\ast$)}]{ wptilde, }
\item[{real(double),dimension(0:npart),intent(inout)}]{ px, }
\item[{real(double),dimension(0:npart),intent(inout)}]{ py, }
\item[{real(double),dimension(0:npart)}]{ pz, }
\item[{real(double),dimension(0:npart),intent(inout)}]{ up, }
\item[{real(double),dimension(0:npart),intent(inout)}]{ vp, }
\item[{real(double),dimension(0:npart)}]{ wp, }
\item[{real(double),dimension(0:npart),intent(inout)}]{ pxi, }
\item[{real(double),dimension(0:npart),intent(inout)}]{ peta, }
\item[{real(double),dimension(0:npart),intent(in)}]{ pzta}
\end{DoxyParamCaption}
)}}
\label{partcles__wall_8f90_ad0bdb84183d0683f178ef61bfbcff1ed}


Definition at line 278 of file partcles\_\-wall.f90.

\hypertarget{partcles__wall_8f90_ae691b59cc5a37c9d38a7d68da4f24de7}{
\index{partcles\_\-wall.f90@{partcles\_\-wall.f90}!parlocat@{parlocat}}
\index{parlocat@{parlocat}!partcles_wall.f90@{partcles\_\-wall.f90}}
\subsubsection[{parlocat}]{\setlength{\rightskip}{0pt plus 5cm}subroutine parlocat (
\begin{DoxyParamCaption}
\item[{integer}]{ ncellsp, }
\item[{integer,dimension($\ast$)}]{ ijkctmp, }
\item[{integer,dimension($\ast$)}]{ iphead, }
\item[{integer}]{ iwid, }
\item[{integer}]{ jwid, }
\item[{integer}]{ kwid, }
\item[{integer}]{ nsampl, }
\item[{real(double),dimension($\ast$)}]{ vrms, }
\item[{real(double),dimension($\ast$)}]{ t\_\-wall, }
\item[{integer,dimension(0:npart)}]{ ico, }
\item[{integer,dimension($\ast$),intent(inout)}]{ ijktmp2, }
\item[{integer,dimension($\ast$)}]{ ijktmp3, }
\item[{integer,dimension($\ast$)}]{ ijktmp4, }
\item[{real(double),intent(in)}]{ rmaj, }
\item[{real(double)}]{ dz, }
\item[{real(double),dimension($\ast$)}]{ alfa, }
\item[{real(double),dimension($\ast$)}]{ ax, }
\item[{real(double),dimension($\ast$)}]{ ay, }
\item[{real(double),dimension($\ast$)}]{ az, }
\item[{real(double)}]{ dt, }
\item[{integer}]{ itdim, }
\item[{integer}]{ npart, }
\item[{integer}]{ ibar, }
\item[{integer}]{ jbar, }
\item[{integer}]{ kbar, }
\item[{integer}]{ mgeom, }
\item[{real(double)}]{ cdlt, }
\item[{real(double)}]{ sdlt, }
\item[{real(double),intent(in)}]{ plost\_\-pos, }
\item[{real(double),intent(in)}]{ plost\_\-neg, }
\item[{real(double),dimension(itdim,$\ast$)}]{ wate, }
\item[{real(double),dimension($\ast$)}]{ x, }
\item[{real(double),dimension($\ast$)}]{ y, }
\item[{real(double),dimension($\ast$)}]{ z, }
\item[{real(double),dimension($\ast$)}]{ bxv, }
\item[{real(double),dimension($\ast$)}]{ byv, }
\item[{real(double),dimension($\ast$)}]{ bzv, }
\item[{real(double),dimension($\ast$)}]{ xptilde, }
\item[{real(double),dimension($\ast$)}]{ yptilde, }
\item[{real(double),dimension($\ast$)}]{ zptilde, }
\item[{real(double),dimension($\ast$)}]{ uptilde, }
\item[{real(double),dimension($\ast$)}]{ vptilde, }
\item[{real(double),dimension($\ast$)}]{ wptilde, }
\item[{real(double),dimension($\ast$)}]{ tsix, }
\item[{real(double),dimension($\ast$)}]{ tsiy, }
\item[{real(double),dimension($\ast$)}]{ tsiz, }
\item[{real(double),dimension($\ast$)}]{ etax, }
\item[{real(double),dimension($\ast$)}]{ etay, }
\item[{real(double),dimension($\ast$)}]{ etaz, }
\item[{real(double),dimension($\ast$)}]{ nux, }
\item[{real(double),dimension($\ast$)}]{ nuy, }
\item[{real(double),dimension($\ast$)}]{ nuz, }
\item[{integer,dimension(0:npart),intent(inout)}]{ link, }
\item[{integer,intent(inout)}]{ iplost, }
\item[{real(double),dimension(0:npart),intent(in)}]{ qpar, }
\item[{real(double),dimension(0:npart)}]{ px, }
\item[{real(double),dimension(0:npart)}]{ py, }
\item[{real(double),dimension(0:npart)}]{ pz, }
\item[{real(double),dimension(0:npart)}]{ up, }
\item[{real(double),dimension(0:npart)}]{ vp, }
\item[{real(double),dimension(0:npart)}]{ wp, }
\item[{real(double),dimension(0:npart)}]{ pxi, }
\item[{real(double),dimension(0:npart)}]{ peta, }
\item[{real(double),dimension(0:npart)}]{ pzta, }
\item[{logical,intent(in)}]{ cartesian, }
\item[{integer,dimension($\ast$)}]{ killer, }
\item[{integer}]{ wl, }
\item[{integer}]{ wr, }
\item[{integer}]{ wb, }
\item[{integer}]{ wt, }
\item[{integer}]{ we, }
\item[{integer}]{ wf, }
\item[{real(double)}]{ dx, }
\item[{real(double)}]{ dy, }
\item[{real(double)}]{ dzdummy, }
\item[{real(double)}]{ xl, }
\item[{real(double)}]{ xr, }
\item[{real(double)}]{ yb, }
\item[{real(double)}]{ yt, }
\item[{real(double)}]{ ze, }
\item[{real(double)}]{ zf, }
\item[{real(double)}]{ nu\_\-len, }
\item[{logical}]{ nu\_\-comm}
\end{DoxyParamCaption}
)}}
\label{partcles__wall_8f90_ae691b59cc5a37c9d38a7d68da4f24de7}


Definition at line 513 of file partcles\_\-wall.f90.

\hypertarget{partcles__wall_8f90_ac65101855df98ffe419c4d07e1250a36}{
\index{partcles\_\-wall.f90@{partcles\_\-wall.f90}!trilinp@{trilinp}}
\index{trilinp@{trilinp}!partcles_wall.f90@{partcles\_\-wall.f90}}
\subsubsection[{trilinp}]{\setlength{\rightskip}{0pt plus 5cm}subroutine trilinp (
\begin{DoxyParamCaption}
\item[{integer,intent(in)}]{ ncells, }
\item[{integer,dimension($\ast$),intent(in)}]{ ijkcell, }
\item[{integer,intent(in)}]{ itdim, }
\item[{integer,intent(in)}]{ iwid, }
\item[{integer,intent(in)}]{ jwid, }
\item[{integer,intent(in)}]{ kwid, }
\item[{integer,dimension($\ast$),intent(in)}]{ iphead, }
\item[{real(double),dimension(0:$\ast$),intent(in)}]{ pxi, }
\item[{real(double),dimension(0:$\ast$),intent(in)}]{ peta, }
\item[{real(double),dimension(0:$\ast$),intent(in)}]{ pzta, }
\item[{real(double),dimension(itdim,$\ast$),intent(in)}]{ wate, }
\item[{real(double),dimension($\ast$),intent(in)}]{ bxv, }
\item[{real(double),dimension($\ast$),intent(in)}]{ byv, }
\item[{real(double),dimension($\ast$),intent(in)}]{ bzv, }
\item[{real(double),dimension($\ast$),intent(out)}]{ bxpn, }
\item[{real(double),dimension($\ast$),intent(out)}]{ bypn, }
\item[{real(double),dimension($\ast$),intent(out)}]{ bzpn}
\end{DoxyParamCaption}
)}}
\label{partcles__wall_8f90_ac65101855df98ffe419c4d07e1250a36}


Definition at line 1114 of file partcles\_\-wall.f90.

